#include <stdio.h>
#include <stdlib.h>
#define dim 5
struct EL {int info; struct EL *next;};
typedef struct EL Lista;
typedef Lista *Plista;
typedef enum {false, true} boolean;

Plista crealista(int n){ 
	int num, i;
	Plista aux, lista;
	if(n==0) return NULL;
	printf("Inserisci intero:\n");
	scanf("%d", &num);
	lista=malloc(sizeof(Lista));
	lista->info=num;
	aux=lista;
	i=1;
	while(i<n)
	{ 
		printf("Inserisci intero:\n");
		scanf("%d", &num);
		aux->next=malloc(sizeof(Lista));
		aux=aux->next;
		aux->info=num;
		i++;
	}
	aux->next=NULL;
	return lista;
}
Plista crealistacircolare(int n){ 
	int num, i;
	Plista aux, lista;
	printf("Inserisci intero:\n");
	scanf("%d", &num);
	lista=malloc(sizeof(Lista));
	lista->info=num;
	aux=lista;
	i=1;
	while(i<n)
	{ 
		printf("Inserisci intero:\n");
		scanf("%d", &num);
		aux->next=malloc(sizeof(Lista));
		aux=aux->next;
		aux->info=num;
		i++;
	}
	aux->next=lista;
	return lista;
}
void stampaCirc(Plista lista, int n){
	boolean condizione=true;
	while(condizione){
		printf("%d ", lista->info);
		lista=lista->next; 
		n-=1;
		if(n==0) condizione=false;
	}
	printf("...\n");
}

boolean cifra(char a){
	if(a>='0' && a<='9') return true;
	else return false;
}
int prodottocifreacaso(int ris){
	char c; 
	c=getchar();
	if(c!='z'){
		if(cifra(c)==true){
			ris*=(c-'0');
			return prodottocifreacaso(ris);
			
		 }
		else return prodottocifreacaso(ris);
	}
	else return ris;
}
int potenze(int base, int exp){
	int ris;
	ris=1;
	while(exp>0){
		ris*=base;
		exp-=1;
	}
	return ris;
}
boolean seriepazza(int v[], int DIM, int x){
	int i, pot, last=-1;
	boolean check;
	for(i=0; i<DIM && check; i++){
		pot=potenze(x, i);
		if(v[i]==pot) check=true;
		else check=false;
		if(v[i]%2==0) last=v[i];
	}
	if(last!=-1)	printf("ultimo intero pari: %d\n", last);
	else printf("tutti interi dispari\n");
	return check;
}

void insert1(Plista *lista, Plista *elem, int k){
	Plista aux, bux;
	aux=*lista;
	if((aux->next)->info==k){
		bux=aux->next;
		aux->next=*elem;
		(*elem)->next=bux;
	}
	else insert1(&((*lista)->next), elem, k);
}

int trova(Plista lista, int Dim, int k){
	int occ=0;
	
	while(Dim>0){
		if((lista)->info==k) occ+=1;
		Dim-=1;
		lista=(lista)->next;
	}
	return occ;
}

int trova1(Plista lista, int k){
	int occ=0;
	Plista rem;
	rem=lista;
	if(lista->info==k) occ++;
	lista=lista->next;
	while(lista!=rem){
		if(lista->info==k) occ++;
		lista=lista->next;
	}
	return occ;
}
		
int main()
{
/*	1
 * 	int ris;
	printf("dammi caratteri a caso:\n");
	ris=prodottocifreacaso(1);
	printf("%d\n", ris);
	*/
/* prova potenze
 * 	int a, b, c;
	printf("base e esp\n");scanf("%d %d", &a, &b);
	c=potenze(a, b);
	printf("%d", c);
*/
/*2 serie
 * 	boolean serie;
	int i;
	int a[dim]={1, 3, 9, 27, 81};
	for(i=0; i<dim; i++) printf("%d\t", a[i]); printf("\n");
	serie=seriepazza(a, dim, 3);
	if(serie) printf("OK\n");
	else printf("NO!\n");
	*/
	Plista lista1, elem;
	int n, k, h, ris;
	printf("numero elementi:\n");
	scanf("%d", &n);
	lista1=crealistacircolare(n);
	stampaCirc(lista1, n);
	
	elem=crealista(1);
	printf("k?\n");
	scanf("%d", &k);
	insert1(&lista1, &elem, k);
	stampaCirc(lista1, n+1);
	printf("\n");
	printf("cosa cerco?\n");
	scanf("%d", &h);
	ris=trova(lista1, n+1, h);
	printf("ci sono %d occorrenze\n", ris);
	ris=trova1(lista1, h);
	printf("ci sono %d occorrenze\n", ris);
	return 0;
}